﻿Public Class frmPrincipal

    Private Sub tsmiUsuarios_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tsmiUsuarios.Click
        Dim lista As New frmUsuarioLista
        lista.ShowDialog()
    End Sub

End Class
